home *** CD-ROM | disk | FTP | other *** search
/ Atari Mega Archive 2 / Atari Mega Archive CD - Volume 2.iso / minix / up1510b.tgz / up1510b / src / lib / ansi / getenv.c < prev    next >
C/C++ Source or Header  |  1990-07-19  |  519b  |  32 lines
  1. #include <lib.h>
  2. /*  getenv(3)
  3.  *
  4.  *  Author: Terrence W. Holm          Aug. 1988
  5.  */
  6.  
  7. #include <stddef.h>
  8. #include <stdlib.h>
  9.  
  10. extern char **environ;
  11.  
  12. char *getenv(name)
  13. _CONST char *name;
  14. {
  15.   char **v;
  16.   _CONST register char *n;
  17.   register char *p;
  18.  
  19.   if (environ == (char **) NULL || name == (char *)NULL) return((char *)NULL);
  20.  
  21.   for (v = environ; *v != (char *)NULL; ++v) {
  22.     n = name;
  23.     p = *v;
  24.  
  25.     while (*n == *p && *n != '\0') ++n, ++p;
  26.  
  27.     if (*n == '\0' && *p == '=') return(p + 1);
  28.   }
  29.  
  30.   return((char *)NULL);
  31. }
  32.